From 71355662867c5be95a3f674e420a14c7909b5df5 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Tue, 14 Nov 2000 15:09:40 +0000 Subject: [PATCH] (comment-indent): Paren typo. --- lisp/newcomment.el | 19 ++++++++++--------- 1 file changed, 10 insertions(+), 9 deletions(-) diff --git a/lisp/newcomment.el b/lisp/newcomment.el index 4675370fdf7..2fe635b1a79 100644 --- a/lisp/newcomment.el +++ b/lisp/newcomment.el @@ -6,7 +6,7 @@ ;; Maintainer: Stefan Monnier ;; Keywords: comment uncomment ;; Version: $Name: $ -;; Revision: $Id: newcomment.el,v 1.22 2000/10/08 19:07:41 monnier Exp $ +;; Revision: $Id: newcomment.el,v 1.23 2000/11/14 10:03:56 monnier Exp $ ;; This file is part of GNU Emacs. @@ -444,14 +444,15 @@ If CONTINUE is non-nil, use the `comment-continuation' markers if any." ;; If that's different from current, change it. (skip-chars-backward " \t") (delete-region (point) begpos) - (indent-to (if (bolp) indent (max indent (1+ (current-column)))))) - ;; An existing comment? - (if cpos - (progn (goto-char cpos) (set-marker cpos nil)) - ;; No, insert one. - (insert starter) - (save-excursion - (insert ender))))))))) + (indent-to (if (bolp) indent + (max indent (1+ (current-column))))))) + ;; An existing comment? + (if cpos + (progn (goto-char cpos) (set-marker cpos nil)) + ;; No, insert one. + (insert starter) + (save-excursion + (insert ender)))))))) ;;;###autoload (defun comment-set-column (arg) -- 2.30.2